unit UPesqPessoas;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, UModeloPesquisa, DB, DBTables, Grids, DBGrids, StdCtrls,
  Buttons, CheckLst, ExtCtrls;

type
  TFPesqPessoas = class(TFModeloPesquisa)
    qPadraoPesquisaPESCODIGO: TIntegerField;
    qPadraoPesquisaPESNOME: TStringField;
    qPadraoPesquisaUSUCODIGO: TIntegerField;
    qPadraoPesquisaPESFANTASIA: TStringField;
    qPadraoPesquisaPESEMAIL: TStringField;
    qPadraoPesquisaPESCPF: TStringField;
    dtmfldPadraoPesquisaPESDTCADASTRO: TDateTimeField;
    qPadraoPesquisaPESHOMEPAGE: TStringField;
    qPadraoPesquisaPESFISJUR: TStringField;
    qPadraoPesquisaPESSTATUS: TStringField;
    qPadraoPesquisaPESRG: TStringField;
    qPadraoPesquisaPESCLIENTE: TSmallintField;
    qPadraoPesquisaPESCOLABORADOR: TSmallintField;
    qPadraoPesquisaPESFORNECEDOR: TSmallintField;
    qPadraoPesquisaPESCODGERENCIAL: TIntegerField;
    qPadraoPesquisaCIDCODIGO: TIntegerField;
    qPadraoPesquisaENDCEP: TStringField;
    qPadraoPesquisaPESLOGRADOURO: TStringField;
    qPadraoPesquisaPESNUMERO: TIntegerField;
    qPadraoPesquisaPESBAIRRO: TStringField;
    qPadraoPesquisaPESCOMPLEMENTO: TStringField;
    qPadraoPesquisaPESTELEFONE: TStringField;
    qPadraoPesquisaPESCOLPAGAINSS: TStringField;
    qPadraoPesquisaPESCOLSALARIO: TFloatField;
    qPadraoPesquisaPESCOLSALARIOCARTEIRA: TFloatField;
    qPadraoPesquisaCGOCODIGO: TIntegerField;
    qPadraoPesquisaCATCODIGO: TIntegerField;
    qPadraoPesquisaCODEQUIPE: TIntegerField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FPesqPessoas: TFPesqPessoas;

implementation

{$R *.dfm}

end.
